﻿Public Class MyItem

    Dim _id As String
    Dim _value As String

    Public ReadOnly Property id() As String
        Get
            Return _id
        End Get
    End Property
    Public ReadOnly Property value() As String
        Get
            Return _value
        End Get
    End Property



    Public Sub New(ByVal newId As String, ByVal newValue As String)
        Me._id = newId
        Me._value = newValue
    End Sub



End Class
